home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / mac / 5-Fonts & Software / Demo Software / RagTime Demo / Printer / QMS8P461.PPD < prev   
Text File  |  1989-04-14  |  11KB  |  353 lines
  1. *% Adobe Systems PostScript(R) Printer Description File
  2. *% For "QMS-PS 800+" version 46.1
  3. *% Produced by "GETapd.ps" version 2.0 edit 47
  4. *%
  5. *% Copyright 1988, 1989 Adobe Systems Incorporated.  All Rights Reserved.
  6. *% Permission is granted for redistribution of this file as
  7. *% long as this copyright notice is intact and the contents
  8. *% of the file is not altered in any way from its original form.
  9. *%
  10. *% The byte count of this file should be exactly 010979 or 011331
  11. *% depending on the filesystem it resides in.
  12. *%
  13. *% Date: 4/6/89
  14. *FormatVersion: "3.0"
  15. *FileVersion: "2.1"
  16. *LanguageVersion: English
  17.  
  18. *Product: "(QMS-PS 800+)"
  19. *PSVersion: "(46.1) 3"
  20. *NickName: "QMS-PS 800 Plus v46.1"
  21.  
  22. *% General Information and Defaults ===============
  23. *ColorDevice: False
  24. *FreeVM: "412988"
  25. *VariablePaperSize: False
  26. *FileSystem: False
  27. *?FileSystem: "/initializedisk where{pop(True)}{(False)} ifelse = flush"
  28. *Throughput: "8"
  29. *Password: "0"
  30. *ExitServer: "
  31.   count 0 eq {  % is the password on the stack?
  32.     true 
  33.   }{
  34.     dup    % potential password
  35.     statusdict begin checkpassword end not
  36.   } ifelse 
  37.   {  %  if no password or not valid 
  38.     (WARNING : Cannot perform the exitserver command.) = 
  39.     (Password supplied is not valid.) = 
  40.     (Please contact the author of this software.) = flush
  41.     quit
  42.   } if 
  43.   serverdict begin exitserver
  44. "
  45. *End
  46.  
  47. *Reset: "
  48.   count 0 eq {  % is the password on the stack?
  49.     true 
  50.   }{
  51.     dup    % potential password
  52.     statusdict begin checkpassword end not
  53.   } ifelse 
  54.   {  %  if no password or not valid 
  55.     (WARNING : Cannot reset printer.) = 
  56.     (Password supplied is not valid.) = 
  57.     (Please contact the author of this software.) = flush
  58.     quit
  59.   } if 
  60.   serverdict begin exitserver
  61.   systemdict /quit get exec
  62.   (WARNING : Printer Reset Failed.) = flush
  63. "
  64. *End
  65.  
  66. *DefaultResolution: 300dpi
  67. *?Resolution: "
  68. save
  69.   initgraphics
  70.   0 0 moveto currentpoint matrix defaultmatrix transform
  71.   0 72 lineto currentpoint matrix defaultmatrix transform
  72.   3 -1 roll sub dup mul
  73.   3 1 roll exch sub dup mul
  74.   add sqrt round cvi
  75.   (          ) cvs print (dpi) = flush
  76. restore
  77. "
  78. *End
  79.  
  80. *% Halftone Information ===============
  81. *ScreenFreq: "60.0"
  82. *ScreenAngle: "45.0"
  83. *DefaultScreenProc: Dot
  84. *ScreenProc Dot: "
  85. {abs exch abs 2 copy add 1 gt {1 sub dup mul exch 1 sub dup mul add 1 
  86. sub }{dup mul exch dup mul add 1 exch sub }ifelse }
  87. "
  88. *End
  89. *ScreenProc Line: "{ pop }"
  90. *ScreenProc Ellipse: "{ dup 5 mul 8 div mul exch dup mul exch add sqrt 1 exch sub }"
  91.  
  92. *DefaultTransfer: Null
  93. *Transfer Null: "{ }"
  94. *Transfer Null.Inverse: "{ 1 exch sub }"
  95. *Transfer Normalized: "
  96. {
  97. mark
  98. 1.0 1.0 .98 .9 .82 .68 .56 .48 .28 .1 .06 .0
  99. counttomark dup 3 add -1 roll exch
  100. 2 sub mul dup floor cvi
  101. dup 3 1 roll sub
  102. exch dup 
  103. 3 add index exch 2 add index dup
  104. 4 1 roll
  105. sub mul add
  106. counttomark 1 add 1 roll 
  107. cleartomark
  108. } bind"
  109. *End
  110. *Transfer Normalized.Inverse: "
  111. {
  112. mark
  113. .0 .0 .06 .1 .28 .48 .56 .68 .82 .9 .98 1.0
  114. counttomark dup 3 add -1 roll exch
  115. 2 sub mul dup floor cvi
  116. dup 3 1 roll sub
  117. exch dup 
  118. 3 add index exch 2 add index dup
  119. 4 1 roll
  120. sub mul add
  121. counttomark 1 add 1 roll 
  122. cleartomark
  123. } bind"
  124. *End
  125.  
  126. *% Paper Handling ===================
  127.  
  128. *% Use these entries to set paper size most of the time, unless there is
  129. *% specific reason to use PageRegion or PaperTray.
  130. *DefaultPageSize: Letter
  131. *PageSize Letter: "statusdict begin lettertray end"
  132. *PageSize Legal: "statusdict begin legaltray end"
  133. *PageSize A4: "statusdict begin a4tray end"
  134. *PageSize B5: "statusdict begin b5tray end"
  135. *?PageSize: "
  136.  save statusdict begin
  137.  /papersize where{ pop
  138.   12 dict begin
  139.    /lettertray (Letter) def /legaltray (Legal) def
  140.    /11x17tray (Tabloid) def /ledgertray (Ledger) def
  141.    /a3tray (A3) def /a4tray (A4) def
  142.    /a5tray (A5) def /b4tray (B4) def
  143.    /b5tray (B5) def /executivetray (Executive) def
  144.    papersize {
  145.      {load exec} stopped not{= flush}{(Unknown) = flush}ifelse
  146.    }{
  147.      {load exec} stopped not{print (.Transverse) = flush}{(Unknown) = flush}ifelse
  148.    }ifelse
  149.   end
  150.  }{
  151.   /pagetype where{pop
  152.     [(Letter)(Legal)]pagetype dup 1 gt{pop 1}if get = flush
  153.   }{
  154.     (Unknown) = flush
  155.   }ifelse
  156.  }ifelse
  157.  end restore
  158. "
  159. *End
  160.  
  161. *% These entries will set up the frame buffer. Usually used with manual feed.
  162. *DefaultPageRegion: Letter
  163. *PageRegion Letter: "letter"
  164. *PageRegion Legal: "legal"
  165. *PageRegion A4: "a4"
  166. *PageRegion B5: "b5"
  167.  
  168. *DefaultPaperTray: None
  169. *PaperTray Letter: "statusdict begin lettertray end"
  170. *PaperTray Legal: "statusdict begin legaltray end"
  171. *PaperTray A4: "statusdict begin a4tray end"
  172. *PaperTray B5: "statusdict begin b5tray end"
  173.  
  174. *% The following entries provide information about specific paper keywords.
  175. *DefaultImageableArea: Letter
  176. *ImageableArea Letter: "18 8 593 784"
  177. *ImageableArea Legal: "18 19 593 990"
  178. *ImageableArea A4: "18 18 577 824"
  179. *ImageableArea B5: "8 14 506 715"
  180. *?ImageableArea: "
  181.  save /cvp { cvi (            ) cvs print ( ) print } bind def
  182.   newpath clippath pathbbox
  183.   4 -2 roll exch 2 {ceiling cvp} repeat
  184.   exch 2 {floor cvp} repeat flush
  185.  restore
  186. "
  187. *End
  188.  
  189. *% These provide the physical dimensions of the paper (by keyword)
  190. *DefaultPaperDimension: Letter
  191. *PaperDimension Letter: "612 792"
  192. *PaperDimension Legal: "612 1008"
  193. *PaperDimension A4: "595 842"
  194. *PaperDimension B5: "516 729"
  195.  
  196. *DefaultOutputBin: Upper
  197. *DefaultInputSlot: None
  198.  
  199. *DefaultManualFeed: False
  200. *?ManualFeed: "statusdict /manualfeed get
  201.  {(True)}{(False)}ifelse = flush"
  202. *End
  203. *ManualFeed True: "statusdict begin /manualfeed true store end"
  204. *ManualFeed False: "statusdict begin /manualfeed false store end"
  205.  
  206. *DefaultOutputOrder: Reverse
  207.  
  208. *DefaultCollator: None
  209. *DefaultSorter: None
  210. *DefaultDuplex: None
  211.  
  212. *% Font Information =====================
  213.  
  214. *DefaultFont: Courier
  215. *Font AvantGarde-Book: Standard "(001.001)"
  216. *Font AvantGarde-BookOblique: Standard "(001.001)"
  217. *Font AvantGarde-Demi: Standard "(001.001)"
  218. *Font AvantGarde-DemiOblique: Standard "(001.001)"
  219. *Font Bookman-Demi: Standard "(001.001)"
  220. *Font Bookman-DemiItalic: Standard "(001.001)"
  221. *Font Bookman-Light: Standard "(001.001)"
  222. *Font Bookman-LightItalic: Standard "(001.001)"
  223. *Font Courier: Standard "(001.001)"
  224. *Font Courier-Bold: Standard "(001.001)"
  225. *Font Courier-BoldOblique: Standard "(001.001)"
  226. *Font Courier-Oblique: Standard "(001.001)"
  227. *Font Helvetica: Standard "(001.001)"
  228. *Font Helvetica-Bold: Standard "(001.001)"
  229. *Font Helvetica-BoldOblique: Standard "(001.001)"
  230. *Font Helvetica-Narrow: Standard "(001.000)"
  231. *Font Helvetica-Narrow-Bold: Standard "(001.000)"
  232. *Font Helvetica-Narrow-BoldOblique: Standard "(001.000)"
  233. *Font Helvetica-Narrow-Oblique: Standard "(001.000)"
  234. *Font Helvetica-Oblique: Standard "(001.001)"
  235. *Font NewCenturySchlbk-Bold: Standard "(001.002)"
  236. *Font NewCenturySchlbk-BoldItalic: Standard "(001.001)"
  237. *Font NewCenturySchlbk-Italic: Standard "(001.001)"
  238. *Font NewCenturySchlbk-Roman: Standard "(001.002)"
  239. *Font Palatino-Bold: Standard "(001.000)"
  240. *Font Palatino-BoldItalic: Standard "(001.000)"
  241. *Font Palatino-Italic: Standard "(001.000)"
  242. *Font Palatino-Roman: Standard "(001.000)"
  243. *Font Symbol: Special "(001.001)"
  244. *Font Times-Bold: Standard "(001.001)"
  245. *Font Times-BoldItalic: Standard "(001.001)"
  246. *Font Times-Italic: Standard "(001.001)"
  247. *Font Times-Roman: Standard "(001.001)"
  248. *Font ZapfChancery-MediumItalic: Standard "(001.002)"
  249. *Font ZapfDingbats: Special "(001.000)"
  250. *?FontQuery: "
  251. save  2 dict begin /sv exch def
  252. /str 128 string def
  253. {
  254.   count 0 gt {
  255.     dup str cvs (/) print print (:) print    
  256.     FontDirectory exch known {(Yes)}{(No)}ifelse = flush
  257.   }{ exit } ifelse
  258. } bind loop
  259. (*) = flush
  260. sv end restore
  261. "
  262. *End
  263.  
  264. *?FontList: "
  265. FontDirectory { pop == } bind forall flush 
  266. (*) = flush
  267. "
  268. *End
  269.  
  270. *% Printer Messages (verbatim from printer):
  271. *Message: "%%[ exitserver: permanent state may be changed ]%%"
  272. *Message: "%%[ Flushing: rest of job (to end-of-file) will be ignored ]%%"
  273. *Message: "\FontName\ not found, using Courier"
  274.  
  275. *% Status (format: %%[ status: <one of these> ]%% )
  276. *Status: "idle"
  277. *Status: "busy"
  278. *Status: "waiting"
  279. *Status: "printing"
  280. *Status: "warming up"
  281. *Status: "PrinterError: timeout, clearing printer"
  282. *Status: "PrinterError: paper entry misfeed"
  283. *Status: "PrinterError: warming up"
  284. *Status: "PrinterError: no toner cartridge"
  285. *Status: "PrinterError: service call"
  286. *Status: "PrinterError: cover open"
  287. *Status: "PrinterError: resetting printer"
  288. *Status: "PrinterError: out of paper"
  289. *Status: "PrinterError: timeout"
  290. *Status: "PrinterError: manual feed timeout"
  291. *Status: "PrinterError: no paper tray"
  292.  
  293. *% Input Sources (format: %%[ status: <stat>; source: <one of these> ]%% )
  294. *Source: "serial9"
  295. *Source: "serial25"
  296. *Source: "AppleTalk"
  297. *Source: "Centronics"
  298.  
  299. *% Printer Error (format: %%[ PrinterError: <one of these> ]%%)
  300. *PrinterError: "timeout, clearing printer"
  301. *PrinterError: "paper entry misfeed"
  302. *PrinterError: "warming up"
  303. *PrinterError: "no toner cartridge"
  304. *PrinterError: "service call"
  305. *PrinterError: "cover open"
  306. *PrinterError: "resetting printer"
  307. *PrinterError: "out of paper"
  308. *PrinterError: "timeout"
  309. *PrinterError: "manual feed timeout"
  310. *PrinterError: "no paper tray"
  311.  
  312. *%DeviceAdjustMatrix: "[1 0 0 1 0 0]"
  313.  
  314. *% Color Separation Information =====================
  315.  
  316. *DefaultColorSep: ProcessBlack.60lpi.300dpi/60 lpi / 300 dpi
  317.  
  318. *InkName: ProcessBlack/Process Black
  319. *InkName: CustomColor/Custom Color
  320. *InkName: ProcessCyan/Process Cyan
  321. *InkName: ProcessMagenta/Process Magenta
  322. *InkName: ProcessYellow/Process Yellow
  323.  
  324. *% For 60 lpi / 300 dpi =====================================================
  325.  
  326. *ColorSepScreenAngle ProcessBlack.60lpi.300dpi/60 lpi / 300 dpi: "45"
  327. *ColorSepScreenAngle CustomColor.60lpi.300dpi/60 lpi / 300 dpi: "45"
  328. *ColorSepScreenAngle ProcessCyan.60lpi.300dpi/60 lpi / 300 dpi: "15"
  329. *ColorSepScreenAngle ProcessMagenta.60lpi.300dpi/60 lpi / 300 dpi: "75"
  330. *ColorSepScreenAngle ProcessYellow.60lpi.300dpi/60 lpi / 300 dpi: "0"
  331.  
  332. *ColorSepScreenFreq ProcessBlack.60lpi.300dpi/60 lpi / 300 dpi: "60"
  333. *ColorSepScreenFreq CustomColor.60lpi.300dpi/60 lpi / 300 dpi: "60"
  334. *ColorSepScreenFreq ProcessCyan.60lpi.300dpi/60 lpi / 300 dpi: "60"
  335. *ColorSepScreenFreq ProcessMagenta.60lpi.300dpi/60 lpi / 300 dpi: "60"
  336. *ColorSepScreenFreq ProcessYellow.60lpi.300dpi/60 lpi / 300 dpi: "60"
  337.  
  338. *% For 53 lpi / 300 dpi =====================================================
  339.  
  340. *ColorSepScreenAngle ProcessBlack.53lpi.300dpi/53 lpi / 300 dpi: "45.0"
  341. *ColorSepScreenAngle CustomColor.53lpi.300dpi/53 lpi / 300 dpi: "45.0"
  342. *ColorSepScreenAngle ProcessCyan.53lpi.300dpi/53 lpi / 300 dpi: "71.5651"
  343. *ColorSepScreenAngle ProcessMagenta.53lpi.300dpi/53 lpi / 300 dpi: "18.4349"
  344. *ColorSepScreenAngle ProcessYellow.53lpi.300dpi/53 lpi / 300 dpi: "0.0"
  345.  
  346. *ColorSepScreenFreq ProcessBlack.53lpi.300dpi/53 lpi / 300 dpi: "53.033"
  347. *ColorSepScreenFreq CustomColor.53lpi.300dpi/53 lpi / 300 dpi: "53.033"
  348. *ColorSepScreenFreq ProcessCyan.53lpi.300dpi/53 lpi / 300 dpi: "47.4342"
  349. *ColorSepScreenFreq ProcessMagenta.53lpi.300dpi/53 lpi / 300 dpi: "47.4342"
  350. *ColorSepScreenFreq ProcessYellow.53lpi.300dpi/53 lpi / 300 dpi: "50.0"
  351.  
  352. *% end of PPD file for QMS-PS 800+
  353.